library(knitr)
input <- "[61]rmd2word.Rmd"
env <- new.env()
assign("table.format", "markdown", env)
output <- knit(input, envir = env, encoding = "UTF-8")
pandoc(output, format = "docx")
\( \alpha+\beta=\gamma^2 \) などの数式も変換できる。データフレームは kable関数 で整形しておくと表に変換される。
kable(head(cars))
| speed | dist |
|---|---|
| 4 | 2 |
| 4 | 10 |
| 7 | 4 |
| 7 | 22 |
| 8 | 16 |
| 9 | 10 |
<m:t> を <w:rFonts w:hAnsi="Cambria Math" w:ascii="Cambria Math"/><m:t> に置換し保存するWordへの変換イメージは次のようになる